SIDeletePointOnCurve

カテゴリ

モデリングの描画

詳細

カーブの指定した位置のポイントを削除します。

スクリプト構文

SIDeletePointOnCurve( InputObj, [InsertPosition] );

パラメータ

パラメータ タイプ 詳細
InputObj 文字列 ポイントが削除されるカーブ
InsertPosition Integer 削除するポイントのインデックス。 ポイントのインデックスは 0 から開始されます。

デフォルト値: 4

VBScript の例

'This example shows how to delete a point from a curve.
newscene
'Create a curve... Do not delete point.
SICreateCurve "CrvListWithPnt", 3, 1
SIAddPointOnCurveAtEnd "CrvListWithPnt", -1, 0, 0, False
SIAddPointOnCurveAtEnd "CrvListWithPnt", -1, 0, -1, False
SIAddPointOnCurveAtEnd "CrvListWithPnt", 1, 0, -1, False
SIAddPointOnCurveAtEnd "CrvListWithPnt", 1, 0, 0, False
Translate "CrvListWithPnt", 0, 0, -1.5, siRelative, siView, siObj, siXYZ
'Create a curve... Delete a point
SICreateCurve "CrvListWithDelPnt", 3, 1
SIAddPointOnCurveAtEnd "CrvListWithDelPnt", -1, 0, 0, False
SIAddPointOnCurveAtEnd "CrvListWithDelPnt", -1, 0, -1, False
SIAddPointOnCurveAtEnd "CrvListWithDelPnt", 1, 0, -1, False
SIAddPointOnCurveAtEnd "CrvListWithDelPnt", 1, 0, 0, False
SelectAllUsingFilter "object", siCheckComponentVisibility
ToggleValue "compobjselvert", "*.camvis,Views.*.*.camvis"
'Delete the third point on curve (First point as 0 index)
SIDeletePointOnCurve "CrvListWithDelPnt", 2
'NOTE: You can do undo to see which point was deleted.
'logmessage "You can do undo to see which point was deleted."

関連項目

CreateCurve SICreateCurve SISetCurvePoints